home *** CD-ROM | disk | FTP | other *** search
/ Aminet 5 / Aminet 5 - March 1995.iso / Aminet / misc / amag / AM9410_2.lha / Haufenweise / Programme / AllocVec.c < prev    next >
C/C++ Source or Header  |  1994-07-15  |  373b  |  25 lines
  1. #include <exec/types.h>
  2. #include <clib/exec_protos.h>
  3.  
  4. void *AllocVec(ULONG Size, ULONG Flags)
  5. {
  6.    APTR  mem    = 0L;
  7.    ULONG memlen = Size + sizeof(ULONG);
  8.  
  9.    if (mem = AllocMem(memlen,Flags))
  10.    {  *(ULONG *)mem = memlen;
  11.       mem = (ULONG *)mem +  1;
  12.  
  13.    }
  14.  
  15.    return mem;
  16. }
  17.  
  18. void FreeVec(APTR mem)
  19. {
  20.    mem = ((ULONG *)mem - 1);
  21.  
  22.    FreeMem(mem, *(ULONG *)mem);
  23. }
  24.  
  25.